home *** CD-ROM | disk | FTP | other *** search
/ Power Programmierung / Power-Programmierung (Tewi)(1994).iso / magazine / drdobbs / 1987 / 08 / tello.exp < prev   
Text File  |  1987-08-12  |  2KB  |  60 lines
  1.          _____________________________
  2.         :      PrintSummary        > :
  3.         :     Doc (ClassDoc)       > :
  4.         :  WhereIs (WhereIsMethod) > :
  5.         :    DeleteFromBrowser     > :
  6.         :       SubBrowser           :
  7.         :       TypeInName           :
  8.         :____________________________:
  9.  
  10.  
  11. Example 1: The Lattice Browser's main menu
  12.  
  13.  
  14. #.($ ActiveValue)
  15. Supers
  16. Object
  17. IVs
  18.  
  19. CVs
  20.  
  21. Methods
  22. AVPrintSource AddActiveValue CopyActiveValue DeleteActiveValue 
  23. DeleteNestedActiveValue GetWrappedValue
  24. GetWrappedValueOnly HasAV? NestActiveValue PutWrappedValue
  25. PutWrappedValueOnly ReplaceActiveValue WrapOutside?
  26. WrappingPrecedence
  27.  
  28. Example 2: Display resulting from selecting ActiveValue and 
  29. using PrintSummary in the Lattice Browser 
  30.  
  31.  
  32. RuleSetName: FillTub;
  33. WorkSpace Class: WashingMachine;
  34. Control Structure: WhileAll;
  35. Temp Vars: waterLimit;
  36. While Cond: T;
  37.  
  38. {1!} IF loadSetting = 'Small THEN waterLimit <- 10;
  39. {1!} IF loadSetting = 'Medium THEN waterLimit <- 13.5;
  40. {1!} IF loadSetting = 'Large THEN waterLimit <- 17;
  41. {1!} IF loadSetting = 'ExtraLarge THEN waterLimit <- 20;
  42.  
  43.  
  44. IF temperatureSetting = 'Hot
  45. THEN HotWaterValve.Open ColdWaterValve.Close;
  46.  
  47.  
  48. IF temperatureSetting = 'Warm
  49. THEN HotWaterValve.Open ColdWaterValve.Open;
  50.  
  51. IF temperatureSetting = 'Hot
  52. THEN ColdWaterValve.Open HotWaterValve.Close;
  53.  
  54. IF waterLevelSensor.Test >= waterLimit
  55. THEN HotWaterValve.Close ColdWaterValve.Close;
  56.      (Stop T)
  57.  
  58. Example 3: An example of the LOOPS rule syntax 
  59.  
  60.